﻿Imports System

Namespace ReportExcel
    Public Class clsLoc
        ' Methods
        Public Sub New(ByVal strKey1 As String, ByVal intLoc1 As Integer)
            Me.intLoc = intLoc1
            Me.strKey = strKey1
        End Sub


        ' Fields
        Public intLoc As Integer
        Public strKey As String
    End Class
End Namespace

